﻿--
--
IF EXISTS (SELECT name FROM sysobjects WHERE name = 'spAccessTokenCheck' AND type = 'P')
BEGIN
  DROP PROCEDURE spAccessTokenCheck
END
GO

-- HU - Jegyellenőrzés
-- EN - Check user token
--
CREATE PROCEDURE spAccessTokenCheck
(@AccessToken INTEGER, @UserID INTEGER OUTPUT, @Lang VARCHAR(10) OUTPUT)
 AS
BEGIN
  DECLARE
    @Rows INTEGER
    
  -- Nyelv megállapítása
  --
  SELECT @Lang = CASE @@LANGUAGE
    WHEN 'magyar' THEN N'HU'
    WHEN 'british' THEN N'EN'
    WHEN 'us_english' THEN N'EN'
    WHEN 'Deutsch' THEN N'DE'
    ELSE
      N'HU'
    END
    
  -- HU - Felhasználó ellenőrzése
  -- EN - Authentication
  --  
  SELECT @UserID = ID
    FROM ZeusUser
   WHERE ID = @AccessToken
   
  SELECT @Rows = @@ROWCOUNT
  
  IF (@Rows != 1) BEGIN

    IF (@Lang = 'HU')
      RAISERROR (N'Bejelentkezés elutasítva !', 16, 1)

    IF (@Lang = 'EN')
      RAISERROR (N'Access denied !', 16, 1)

    IF (@Lang = 'DE')
      RAISERROR (N'Einloggen Abgelehnt !', 16, 1)

    GOTO __ERROR__
  END
    
-- Well done.
--
  RETURN(0)

-- We have a problem !
--
__ERROR__:
  RETURN(1)
END
GO
